IF EXISTS(SELECT * FROM sysobjects WHERE name = 'obtenerSeguienteCodigoMuestraPorSerie' AND type = 'P')
BEGIN
	DROP PROCEDURE obtenerSeguienteCodigoMuestraPorSerie
END
GO
CREATE PROCEDURE [dbo].[obtenerSeguienteCodigoMuestraPorSerie]
(
@CodigoSerieMuestra	INT
)
AS
/*********************************************************************
	Resumen: Genera codigo de Sondaje
	Parametros: @CodigoSerieMuestra Serie de Codigo de Muestra
**********************************************************************/		

BEGIN
	DECLARE @codigoSeguienteGenerado INT
	SET @codigoSeguienteGenerado = 1
	
	SELECT  @codigoSeguienteGenerado = convert(INT, left(isnull(max(t1.CodigoMuestra), '0000000'), 7)) + 1
	FROM CodigoMuestra t1
	WHERE t1.CodigoSerieMuestra = @CodigoSerieMuestra
	AND LEN(t1.CodigoMuestra) >= 7
	SELECT @codigoSeguienteGenerado AS codigoSeguienteGenerado

END

-- obtenerSeguienteCodigoMuestraPorSerie 1

